; filelog - log all actions performed on any files
; copyright abandoned 2000,  Kiwi Software (Luke Graham)
; Version 0.0.3,  last updated 23/02/2000 (lrg)

; OS_File entry point look up tables

 AREA	|osFileData|, DATA, READONLY

osFileCTableStartOffset DCD	osFileCTableStartOffset
osFileConditionTable	DCD	osFile0
			DCD	osFile1
			DCD	osFile2
			DCD	osFile3
			DCD	osFile4
			DCD	osFile5
			DCD	osFile6
			DCD	osFile7
			DCD	osFile8
			DCD	osFile9
			DCD	osFile10
			DCD	osFile11
			DCD	osFile12
			DCD	osFile13
			DCD	osFile14
			DCD	osFile15
			DCD	osFile16
			DCD	osFile17
			DCD	osFile18
			DCD	osFile19
			DCD	osFile20
			DCD	osFile21
			DCD	osFile22
			DCD	osFile23
			DCD	osFile24
			DCD	osFile255

osFile0			DCB	"OS_File called - Reason code 0  (Save block of memory as a file)",0
			ALIGN

osFile1			DCB	"OS_File called - Reason code 1  (Write cat info for named object)",0
			ALIGN

osFile2			DCB	"OS_File called - Reason code 2  (Write load address for named object)",0
			ALIGN

osFile3			DCB	"OS_File called - Reason code 3  (Write exec address for named object)",0
			ALIGN

osFile4			DCB	"OS_File called - Reason code 4  (Write attributes for named object)",0
			ALIGN

osFile5			DCB	"OS_File called - Reason code 5  (Read cat info for object)",0
			ALIGN

osFile6			DCB	"OS_File called - Reason code 6  (Delete named object)",0
			ALIGN

osFile7			DCB	"OS_File called - Reason code 7  (Create empty unstamped file)",0
			ALIGN

osFile8			DCB	"OS_File called - Reason code 8  (Create directory)",0
			ALIGN

osFile9			DCB	"OS_File called - Reason code 9  (Date stamp named object)",0
			ALIGN

osFile10		DCB	"OS_File called - Reason code 10 (Save block of memory as typed file)",0
			ALIGN

osFile11		DCB	"OS_File called - Reason code 11 (Create empty file)",0
			ALIGN

osFile12		DCB	"OS_File called - Reason code 12 (Load named file given path)",0
			ALIGN

osFile13		DCB	"OS_File called - Reason code 13 (Read cat info for object given path)",0
			ALIGN

osFile14		DCB	"OS_File called - Reason code 14 (Load named file given path variable)",0
			ALIGN

osFile15		DCB	"OS_File called - Reason code 15 (Read cat info for object given path variable)",0
			ALIGN

osFile16		DCB	"OS_File called - Reason code 16 (Load named file without path)",0
			ALIGN

osFile17		DCB	"OS_File called - Reason code 17 (Read cat info for object without path)",0
			ALIGN

osFile18		DCB	"OS_File called - Reason code 18 (Set type of named object)",0
			ALIGN

osFile19		DCB	"OS_File called - Reason code 19 (Generate error message)",0
			ALIGN

osFile20		DCB	"OS_File called - Reason code 20 (Read cat info for stamped object)",0
			ALIGN

osFile21		DCB	"OS_File called - Reason code 21 (Read cat info for stamped object given path)",0
			ALIGN

osFile22		DCB	"OS_File called - Reason code 22 (Read cat info for stamped object given path variable)",0
			ALIGN

osFile23		DCB	"OS_File called - Reason code 23 (Read cat info for stamped object without path)",0
			ALIGN

osFile24		DCB	"OS_File called - Reason code 24 (Read block size of file)",0
			ALIGN

osFile255		DCB	"OS_File called - Reason code 255 (Load named file)",0
			ALIGN

fileVUnKnownS		DCB	"OS_File called with unknown reason code (%6d)",0
			ALIGN

osFileRTableStartOffset DCD	osFileRTableStartOffset
osFileRegsTable		DCD	-1
			DCD	fileV1S
			DCD	fileV2S
			DCD	fileV3S
			DCD	fileV4S
			DCD	-1
			DCD	-1
			DCD	fileV7S
			DCD	-1
			DCD	-1
			DCD	fileV10S
			DCD	fileV11S
			DCD	fileV12S
			DCD	fileV13S
			DCD	fileV14S
			DCD	fileV15S
			DCD	-1
			DCD	-1
			DCD	fileV18S
			DCD	fileV19S
			DCD	-1
			DCD	fileV13S	;reuse
			DCD	fileV15S	;reuse
			DCD	-1
			DCD	-1
			DCD	fileV255S

fileVNameS		DCB	"filename (r1) = %7s",0
			ALIGN

fileV1S			DCB	"load address (r2) = 0x%8x  exec address (r3) = 0x%9x  attribs (r5) = 0x%11x",0
			ALIGN

fileV2S			DCB	"load address (r2) = 0x%8x",0
			ALIGN

fileV3S			DCB	"exec address (r3) = 0x%9x",0
			ALIGN

fileV4S			DCB	"attribs (r5) = 0x%11x",0
			ALIGN

fileV7S			DCB	"load address (r2) = 0x%8x  exec address (r3) = 0x%9x  size (r5) = 0x%11x",0
			ALIGN

fileV10S		DCB	"filetype (r2) = 0x%8x",0
			ALIGN

fileV11S		DCB	"filetype (r2) = 0x%8x  size (r5) = 0x%11x",0
			ALIGN

fileV12S		DCB	"load address (r2) = 0x%8x  r3 (use files load if R3 AND 0xFF != 0) = 0x%9x  path string (r4) = %10s",0
			ALIGN

fileV13S		DCB	"path string (r4) = %10s",0
			ALIGN

fileV14S		DCB	"load address (r2) = 0x%8x  r3 (use files load if R3 AND 0xFF != 0) = 0x%9x  path variable (r4) = %10s",0

fileV15S		DCB	"path variable (r4) = %10s",0
			ALIGN

fileV18S		DCB	"filetype (r2) = 0x%8x",0
			ALIGN

fileV19S		DCB	"object type (r2) = 0x%8x",0
			ALIGN

fileV255S		DCB	"load address (r2) = 0x%8x  r3 (use files load if R3 AND 0xFF != 0) = 0x%9x",0
			ALIGN

 END
